' Delete a key of a resource using DELETE
Private Sub Delete$Controller$Key (id As Long, Key As String)
	' #Desc = Delete a key of an item in $Controller$List
	' #Elements = [":id", ":key"]

	If id < 1 Then
		HRM.ResponseError = "Invalid id value"
		HRM.ResponseCode = 404
	Else
		Dim Index As Int = Main.$Controller$List.IndexFromId(id)
		If Index < 0 Then
			HRM.ResponseError = "$Controller$ not found"
			HRM.ResponseCode = 404
		Else
			If Main.$Controller$List.List.Get(Index).As(Map).ContainsKey(Key) Then
				Main.$Controller$List.RemoveKey(Key, Index)
				HRM.ResponseCode = 200
				HRM.ResponseMessage = $"${Key} Key Removed"$
				If Main.KVS_ENABLED Then Main.WriteKVS("$Controller$List", Main.$Controller$List)
			Else
				HRM.ResponseError = "Invalid key value"
				HRM.ResponseCode = 404
			End If
		End If
	End If
	ReturnApiResponse
End Sub